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1 static void enque(ParallelThread *pt, java_lang_Object *v) { 

2 int p = pt->number; f* process id */ 

3 sq_nexts *local = (sq_nexts *) pt->data1 ; I* local is local to thread p */ 

4 while (PCBfull(Q->pcb[local->nextpush,p])) { 

5 local->nextpush = mod(local->nextpush + 1, n) 

6 } 

7 PCBpush(v,Q->pcb[local->nextpush,p]); /* push item */ 

8 !ocal->nextpush = mod(local->nextpush + 1 , n); 

9 } 

1 typedef struct { 

2 int in; I* counter of total number of elements inserted into PCB */ 

3 int out; I* counter of total number of elements deleted from the PCB */ 

4 java_lang_Object *buff[PCB_SIZE]; /* the PCB buffer, which is "circular"*/ 

5 } PCB; 

1 static boolj PCBfull(PCB *b) { 

2 if (mod(b->in - b->out, PCB_SIZE) == PCB_SIZE - 1 ) /* leave empty space */ 

3 return TRUE; 

4 else return FALSE; 

5 } 

1 static PCBpush(java_lang_Object *v, PCB *b) { 

2 b->buff[b->in] = v; 

3 b->in = mod(b-> in + 1 , PCB_SIZE); 

4 } 

1 static int mod(int x, int n){ 

2 while(x >= n) x = x - n; 

3 while(x < 0) x = x + n; 

4 return x; 

5 } 
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1 static java_lang_Object *deque(ParallelThread *pt){ 

2 int p = pt->number; /* process id */ 

3 sqjiexts *local = (sq_nexts *) pt->data1 ; /* local is local to thread p */ 

4 intj; 

5 const termjimit = 2*n; /* limit set after which termination is attempted 7 

6 while (PCBempty(Q->pcb[p,local->nextpop])) { 

7 local->nextpop = mod(local->nextpop + 1 ,n); 

8 local->empty_count = local->empty_count+1; 

9 if (local->empty_count == termjimit) { 

10 local->status = inactive; 

11 for(j=0;j=n-1;j++){ 

12 if (! PCBempty(Q->pcbO,p])) 

1 3 local->status = active; 

14 } 

15 if (local->status == inactive) 

1 6 mark_self_inactive(p,&statusBitmap); 

17 if (IStatusBitmap) I* all threads are inactive, return */ 

18 return NULL; I* system termination state reached */ 

1 9 else local->empty_count = 0; 

20 } 

21 } 

22 if (local->status == inactive){ 

23 local->status = active; 

24 mark_self_active(p,&statusBitmap); 

25 } 

26 int pop = local->nextpop; 

27 local->nextpop = mod(local->nextpop + 1 , n); 

28 return PCBpop(Q->pcb[p,pop]); 

29 } 

1 static bool_t PCBempty(PCB *b) { 

2 return (b->in == b->out); 

3 } 

1 static java_lang_Object *PCBpop(PCB *b) { 

2 java_lang_Object *v; 

3 v = b->buff[b->out]; 

4 b->out = mod(b->out +1 , PCB_SIZE); 

5 return v; 



6 } 
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1 static void mark_self_inactive(int self, int *pStatusBitmap) { 

2 int oldValue.newValue; 

3 do{ 

4 oldValue = *pStatusBitmap; 

5 newValue = oldValue & (~(1 «self)); 

6 newValue = caslnt(newValue, oldValue, pStatusBitmap); 

7 } while (newValue != oldValue) ; 

8 } 

1 static void mark_self_active(int self, int *pStatusBitmap) { 

2 int oldValue.newValue; 

3 do{ 

4 oldValue = *pStatusBitmap; 

5 newValue = oldValue | (1 «self); 

6 newValue = caslnt(newValue, oldValue, pStatusBitmap); 

7 } while (newValue != oldValue) ; 

8 } 
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